PC World Komputer 1998 July & August/Pcwk78a98.iso/Sharewar/Organise/_SETUP.1/Epoch Organiser 3.0.exe/0/RCDATA/TPRESETEDITFORM/TPRESETEDITFORM.txt

Text File | 1998-01-25 | 3KB | 181 lines

object PresetEditForm: TPresetEditForm
  Left = 84
  Top = 147
  BorderStyle = bsDialog
  Caption = 'Preset List Editor'
  ClientHeight = 130
  ClientWidth = 450
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clBlack
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OnClose = FormClose
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 254
    Top = 12
    Width = 26
    Height = 13
    Caption = 'Label'
  end
  object Label2: TLabel
    Left = 254
    Top = 37
    Width = 29
    Height = 13
    Caption = 'Image'
  end
  object Label3: TLabel
    Left = 255
    Top = 64
    Width = 3
    Height = 13
    WordWrap = True
  end
  object YearRG: TRadioGroup
    Left = 140
    Top = 4
    Width = 109
    Height = 121
    Caption = 'Preset Year'
    ItemIndex = 0
    Items.Strings = (
      'Calendar Year'
      'Last Year'
      'This Year'
      'Next Year'
      'Next Occurence')
    TabOrder = 0
  end
  object GroupBox2: TGroupBox
    Left = 4
    Top = 4
    Width = 130
    Height = 121
    Caption = 'Preset Day && Month'
    TabOrder = 1
    object DayList: TListBox
      Left = 8
      Top = 16
      Width = 42
      Height = 97
      ItemHeight = 13
      Items.Strings = (
        '1st'
        '2nd'
        '3rd'
        '4th'
        '5th'
        '6th'
        '7th'
        '8th'
        '9th'
        '10th'
        '11th'
        '12th'
        '13th'
        '14th'
        '15th'
        '16th'
        '17th'
        '18th'
        '19th'
        '20th'
        '21st'
        '22nd'
        '23rd'
        '24th'
        '25th'
        '26th'
        '27th'
        '28th'
        '29th'
        '30th'
        '31st')
      TabOrder = 0
    end
    object MonthList: TListBox
      Left = 57
      Top = 16
      Width = 65
      Height = 97
      ItemHeight = 13
      Items.Strings = (
        'January'
        'February'
        'March'
        'April'
        'May'
        'June'
        'July'
        'August'
        'September'
        'October'
        'November'
        'December')
      TabOrder = 1
    end
  end
  object HintEdit: TEdit
    Left = 286
    Top = 10
    Width = 160
    Height = 21
    TabOrder = 2
    OnChange = HintEditChange
  end
  object Browsebtn: TBitBtn
    Left = 421
    Top = 34
    Width = 26
    Height = 22
    Hint = 'Select Image'
    ParentShowHint = False
    ShowHint = True
    TabOrder = 3
    OnClick = BrowsebtnClick
    NumGlyphs = 2
  end
  object ImageEdit: TEdit
    Left = 286
    Top = 35
    Width = 135
    Height = 21
    Cursor = crArrow
    Hint = 'Reset Image To Default'
    ParentShowHint = False
    ReadOnly = True
    ShowHint = True
    TabOrder = 4
    OnClick = ImageEditClick
  end
  object OKbtn: TBitBtn
    Left = 256
    Top = 102
    Width = 52
    Height = 23
    TabOrder = 5
    Kind = bkOK
  end
  object Helpbtn: TBitBtn
    Left = 396
    Top = 102
    Width = 52
    Height = 23
    TabOrder = 6
    OnClick = HelpbtnClick
    Kind = bkHelp
  end
  object Cancelbtn: TBitBtn
    Left = 318
    Top = 102
    Width = 68
    Height = 23
    TabOrder = 7
    Kind = bkCancel
  end
end